assume cs:codesg,ds:datasg

datasg segment
	dd 100001h
	dw 100h
	dw 0h
datasg ends
codesg segment
start:	
		mov ax,datasg
		mov ds,ax
		mov ax,ds:[0]
		mov dx,ds:[2]
		div word ptr ds:[4]
		mov ds:[6],ax
		mov ax,4c00h
		int 21h
codesg ends
end start